Imports Microsoft.VisualBasic

Public Class Registro
    Private _detalle As String
    Private _fecha As String
    Private _hora As String
    Private _tipo As String

    Public Sub New(ByVal detalle As String, ByVal fecha As String, ByVal hora As String, ByVal tipo As String)
        Me._detalle = detalle
        Me._fecha = fecha
        Me._hora = hora
        Me._tipo = tipo
    End Sub

    Public Property Detalle() As String
        Get
            Return _detalle
        End Get

        Set(ByVal value As String)
            _detalle = value
        End Set
    End Property

    Public Property Fecha() As String
        Get
            Return _fecha
        End Get

        Set(ByVal value As String)
            _fecha = value
        End Set
    End Property

    Public Property Hora() As String
        Get
            Return _hora
        End Get

        Set(ByVal value As String)
            _hora = value
        End Set
    End Property

    Public Property Tipo() As String
        Get
            Return _tipo
        End Get

        Set(ByVal value As String)
            _tipo = value
        End Set
    End Property

End Class
